library(ggplot2)
## Warning: package 'ggplot2' was built under R version 3.4.4
library(here)
## Warning: package 'here' was built under R version 3.4.4
## here() starts at C:/Users/selen/Documents/GitHub/2019GP
library(plotly)
## Warning: package 'plotly' was built under R version 3.4.4
## 
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
## 
##     last_plot
## The following object is masked from 'package:stats':
## 
##     filter
## The following object is masked from 'package:graphics':
## 
##     layout
library(tidyverse)
## Warning: package 'tidyverse' was built under R version 3.4.4
## -- Attaching packages -------------------------------------------------------------------- tidyverse 1.2.1 --
## v tibble  1.4.2     v purrr   0.2.4
## v tidyr   0.8.0     v dplyr   0.7.8
## v readr   1.1.1     v stringr 1.2.0
## v tibble  1.4.2     v forcats 0.2.0
## Warning: package 'tibble' was built under R version 3.4.3
## Warning: package 'tidyr' was built under R version 3.4.3
## Warning: package 'purrr' was built under R version 3.4.3
## Warning: package 'dplyr' was built under R version 3.4.4
## -- Conflicts ----------------------------------------------------------------------- tidyverse_conflicts() --
## x dplyr::filter() masks plotly::filter(), stats::filter()
## x dplyr::lag()    masks stats::lag()
library(gganimate)
library(ggrepel)
## Warning: package 'ggrepel' was built under R version 3.4.3
library(ggridges)
## Warning: package 'ggridges' was built under R version 3.4.4
## 
## Attaching package: 'ggridges'
## The following object is masked from 'package:ggplot2':
## 
##     scale_discrete_manual

Kobe plots for 14 filtered Geners

## Warning: package 'bindrcpp' was built under R version 3.4.4

How does this change over projected time in MPA and No MPA scenario

Historical fishing effort